home *** CD-ROM | disk | FTP | other *** search
- -
- -f100 500 0
- -
- -a100
- 133C:0100 ;
- 133C:0100 ; fastvid - fast video routines
- 133C:0100 ;
- 133C:0100 ; this program will terminate and stay resident. it replaces some
- 133C:0100 ; of the slowest video services with new, faster versions.
- 133C:0100 ;
- 133C:0100 ; s.h.smith, 11-may-86
- 133C:0100 ;
- 133C:0100 ;
- 133C:0100
- -a100
- 133C:0100 ; startup entry point
- 133C:0100 jmp 190 ;install
- 133C:0103
- -
- -a103
- 133C:0103 ; vector to old DOS interrupt
- 133C:0103 db 0,0,0,0
- 133C:0107
- -
- -a109
- 133C:0109 ; new video service interrupt
- 133C:0109 cmp ah,02
- 133C:010C jz 170 ;DISPLAY OUTPUT
- 133C:010E cmp ah,06
- 133C:0111 jz 160 ;DIRECT CONSOLE I/O
- 133C:0113 jmp 120
- 133C:0115
- -
- -a120
- 133C:0120 ; vector to old DOS handler
- 133C:0120 cs:
- 133C:0121 jmp far [103] ;to old DOS handler
- 133C:0125 ;
- 133C:0125 ; a signature in bytes
- 133C:0125 ;
- 133C:0125 db 0a,0d,'FASTVID - Fast video for DOS, S.H.Smith, 13-May-86',0a,0d
- 133C:015B db 1a
- 133C:015C
- -
- -a160
- 133C:0160 ;
- 133C:0160 ; new 'DIRECT CONSOLE I/O' function
- 133C:0160 ;
- 133C:0160 cmp dl,ff
- 133C:0163 jz 120 ;let DOS do the console input function
- 133C:0165 jmp 170 ;else use display output
- 133C:0167
- -
- -a170
- 133C:0170 ;
- 133C:0170 ; new 'DISPLAY OUTPUT' function
- 133C:0170 ;
- 133C:0170 cmp dl,9 ;tab?
- 133C:0173 jz 120 ;use DOS for these, bios doesn't expand
- 133C:0175 ;
- 133C:0175 ;pass display request on to bios
- 133C:0175 ;
- 133C:0175 mov ah,0e ;write tty service
- 133C:0177 mov al,dl ;char to write
- 133C:0179 mov dl,15 ;default color
- 133C:017B int 10 ;bios video service
- 133C:017D iret
- 133C:017E
- -
- -a190
- 133C:0190 ;
- 133C:0190 ; startup code
- 133C:0190 ;
- 133C:0190 mov ax,0
- 133C:0193 mov ds,ax
- 133C:0195 ;
- 133C:0195 ;save old dos vector
- 133C:0195 ;
- 133C:0195 mov ax,[84]
- 133C:0198 cs:
- 133C:0199 mov [103],ax
- 133C:019C mov ax,[86]
- 133C:019F cs:
- 133C:01A0 mov [105],ax
- 133C:01A3 ;
- 133C:01A3 ;install new vector
- 133C:01A3 ;
- 133C:01A3 mov ax,109
- 133C:01A6 mov [84],ax
- 133C:01A9 mov ax,cs
- 133C:01AB mov [86],ax
- 133C:01AE ;
- 133C:01AE ;set last resident code offset
- 133C:01AE ;and terminate-and-stay-resident
- 133C:01AE ;
- 133C:01AE mov dx,190
- 133C:01B1 int 27
- 133C:01B3
- -
- -rcx
- CX 0000
- :100
- -nfastvid.com
- -w
- Writing 0100 bytes
- -q
-